﻿<%@ Page Language="VB" AutoEventWireup="false" CodeFile="asign.aspx.vb" Inherits="asign" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
    <title>Asign Page</title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
    
    
    	<%

	    Dim fileSystem = Server.CreateObject("Scripting.FileSystemObject")
    	    Dim folderContent = fileSystem.GetFolder(Server.MapPath("\") & "filesystem")

	    Response.Write("<ul>")

	    For Each fileName In folderContent.Files

	        Response.Write("<li>" & fileName.Name)
	   
	    Next

	    Response.Write("</ul>")

	%>
    
    </div>
    </form>
</body>
</html>
